<?php 

/**
 * CodeRS - Atviras kodas Lietuvai
 * Copyright (C) 2007 CodeRS www.coders.lt info@coders.lt
 * MightMedia TVS
 * vartotojai.php - Vartotojų administravimas
 * 
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 * 
 * 
 * Ši programa yra laisva. Jūs galite ją platinti ir/arba modifikuoti
 * remdamiesi Free Software Foundation paskelbtomis GNU Bendrosios
 * Viešosios licencijos sąlygomis: 2 licencijos versija, arba (savo
 * nuožiūra) bet kuria vėlesne versija.
 * 
 * Ši programa platinama su viltimi, kad ji bus naudinga, bet BE JOKIOS
 * GARANTIJOS; be jokios numanomos PERKAMUMO ar TINKAMUMO KONKRETIEMS
 * TIKSLAMS garantijos. Žiūrėkite GNU Bendrąją Viešąją licenciją norėdami
 * sužinoti smulkmenas.
 * 
 * Jūs turėjote kartu su šia programa gauti ir GNU Bendrosios Viešosios
 * licencijos kopija; jei ne - rašykite Free Software Foundation, Inc., 59
 * Temple Place - Suite 330, Boston, MA 02111-1307, USA.
**/

if ($_SERVER['PHP_SELF'] == __FILE__) { header('location: ?'); exit(); }
if (!defined("LEVEL") || LEVEL < 30 || !defined("OK")) { header('location: ../'); }

//Nustatom pagal ka rusiuosim
if (isset($url['o']) && !empty($url['o'])) { 
	switch ($url['o']) {
		case "Slapyvardis": {
			$order = "nick";
			break;
		}
		case "Nr:": {
			$order = "id";
			break;
		}
		case "e-pa%C5%A1tas": {
			$order = "email";
			break;
		}
		case "IP": {
			$order = "ip";
			break;
		}
		case "U%C5%BEsiregistravo": {
			$order = "reg_data";
			break;
		}
		case "Prisijung%C4%97": {
			$order = "login_data";
			break;
		}
		default: {
			$order = "id";
			break;
		}
	}
}
//nustatom mazejancia ar didejancia tvarka
if (isset($url['w']) && !empty($url['w'])) { 
	switch ($url['w']) {
		case "d": {
			$order .= " DESC";
			break;
		}
		case "a": {
			$order .= " ASC";
			break;
		}
		default: {
			$order .= " ASC";
			break;
		}
	}
}
else { $order = "id ASC"; }

if (isset($url['d']) && $url['d'] != "" && $url['d'] != 0) {
	mysql_query("DELETE FROM users WHERE id=".escape((int)$url['d'])." AND levelis<30") or die(mysql_error());
	header("Location: ".url('d,0'));
}
//paruosiam klase lenteliu paisymui
include_once("class.php");
?>
		<h2>Vartotojų administravimas</h2>
		<?
		//adminu saras
		$sql = $db->uzklausa("SELECT id, INET_NTOA(ip) AS ip, reg_data, gim_data, login_data, nick, vardas, pavarde, email FROM users WHERE levelis=30"); $i=0;
		if (mysql_num_rows($sql) > 0) {
			while($row = mysql_fetch_assoc($sql)) {
				$i++;
				$info[] = array(
				"Nr:"=>$row['id'],
				"Slapyvardis"=> "<a href=\"?id,47;m,".$row['id']."\" title=\"".$row['reg_data']."\">".$row['nick']."</a> <a href=\"?id,45;n,1;u,".$row['nick']."\"><img src=\"images/pm/mail.png\" alt=\"pm\" border=\"0\"></img></a>",
				"IP"=>$row['ip'],
				"Užsiregistravo" => kada($row['reg_data']),
				"Prisijungė"=>kada($row['login_data']),
				"e-paštas"=>preg_replace("#([a-z0-9\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)?[\w]+)#i", "<a href=\"javascript:mailto:mail('\\1','\\2');\">\\1_(at)_\\2</a>", $row['email']),
				"Vardas"=>$row['vardas']." ".$row['pavarde'],
				"Amžius"=>amzius($row['gim_data'])."m.",
				"Valdymas"=>"<a href='?id,46;a,6;r,102'>[r]</a>"
				);
			}
			//nupiesiam adminu lentele
			$bla = new Table();
			lentele("Administratoriu - ".$i,$bla->render($info));
			unset($info,$i);
		} else { klaida("Administratoriu - ".$i,"Administratorių nėra. Šeip čia kažkoks nesusipratimas turbūt. Greičiausiai duombazės problemos"); }
		
		//moderatoriu sarasas
		$sql = $db->uzklausa("SELECT id, INET_NTOA(ip) AS ip, reg_data, gim_data, login_data, nick, vardas, pavarde, email FROM users WHERE levelis>19 AND levelis<30"); $i=0;
		if (mysql_num_rows($sql) > 0) {
			while($row = mysql_fetch_assoc($sql)) {
				$i++;
				$info1[] = array(
				"Nr:"=>$row['id'],
				"Slapyvardis"=> "<a href=\"?id,47;m,".$row['id']."\" title=\"".$row['reg_data']."\">".$row['nick']."</a> <a href=\"?id,45;n,1;u,".$row['nick']."\"><img src=\"images/pm/mail.png\" alt=\"pm\" border=\"0\"></img></a>",
				"IP"=>$row['ip'],
				"Užsiregistravo" => kada($row['reg_data']),
				"Prisijungė"=>kada($row['login_data']),
				"e-paštas"=>preg_replace("#([a-z0-9\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)?[\w]+)#i", "<a href=\"javascript:mailto:mail('\\1','\\2');\">\\1_(at)_\\2</a>", $row['email']),
				"Vardas"=>$row['vardas']." ".$row['pavarde'],
				"Amžius"=>amzius($row['gim_data'])."m.",
				"Valdymas"=>"<button onclick=\"if (confirm('Ar tikrai nori ištrinti?')) window.location='".url("d,".$row['id'])."'; else return false;\">X</button> <a href='?id,46;a,6;r,102'>[r]</a> <a href='?id,46;a,6;b,".$row['ip']."'>[b]</a>"
				);
			}
			//nupiesiam moderatoriu lentele
			$bla = new Table();
			lentele("Moderatorių - ".$i,$bla->render($info1));
			unset($info1,$i);
		} else { klaida("Moderatorių - ".$i,"Svetainė neturi moderatorių"); }
		echo "<hr>";
		
		//vartotoju sarasas
		$sql = $db->uzklausa("SELECT id, INET_NTOA(ip) AS ip, reg_data, login_data, gim_data, nick, vardas, pavarde, email FROM users WHERE levelis<20 ORDER BY $order"); $i=0;
		if (mysql_num_rows($sql) > 0) {
			while($row = mysql_fetch_assoc($sql)) {
				$i++;
				$info2[] = array(
				"Nr:"=>$row['id'],
				"Slapyvardis"=> "<a href=\"?id,47;m,".$row['id']."\" title=\"".$row['reg_data']."\">".$row['nick']."</a> <a href=\"?id,45;n,1;u,".$row['nick']."\"><img src=\"images/pm/mail.png\" alt=\"pm\" border=\"0\"></img></a>",
				"IP"=>$row['ip'],
				"Užsiregistravo" => kada($row['reg_data']),
				"Prisijungė"=>kada($row['login_data']),
				"e-paštas"=>preg_replace("#([a-z0-9\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)?[\w]+)#i", "<a href=\"javascript:mailto:mail('\\1','\\2');\">\\1_(at)_\\2</a>", $row['email']),
				"Vardas"=>$row['vardas']." ".$row['pavarde'],
				"Amžius"=>amzius($row['gim_data'])."m.",
				"Valdymas"=>"<button onclick=\"if (confirm('Ar tikrai nori ištrinti?')) window.location='".url("d,".$row['id'])."'; else return false;\">X</button> <a href='?id,46;a,6;r,102'>[r]</a> <a href='?id,46;a,6;b,".$row['ip']."'>[b]</a>"
				);
			}
			//nupiesiam vartotoju lentele
			$bla = new Table();
			lentele("Vartotoju - ".$i,$bla->render($info2));
			unset($info2,$i);
		} else { klaida("Vartotojų - ".$i,"Svetainėje nėra neivieno registruoto vartotojo"); }
		?>
</div>